آموزش دستور if در پاسکال

امروز می خواهم یک دستور مهم و پر کاربرد را به شما آموزش بدهم :

 دستور if :

این دستور را اگر بخواهیم با معنای فارسی آن که در ( ) نوشته ام بنویسیم اینطور می شود :

(سپس)then

(شروع)begin

;دستورات

;(پایان)end

که یعنی اگر شرط ما درست بود دستورات را انجام بده .

آموزش مقادیر ومتغیر ها در لیست پارامتر ها در پاسکال

وقتی در جلوی پارامترها Var قرار می دهیم با مراجعه به نام این پارامتر ها می توان آنرا به سابروتین وارد کرد و یا نتیجه گرفت . ولی در صورتیکه جلوی پارامتری Var قرار ندهیم ،مقدار آن پارامتر مورد نظر خواهدبود در حالت اول کامپیوتر محلی برای متغیر در نظر می گیریدو هر بار به آن محل مراجع می کند و محتوای آنرا انتقال می دهد . و این محتوا داخل و خارج برنامه قابل استفاده است .در حالت دوم کامپیووتر یک کپی از مقدار متغیر را به سابروتین می برد ومحلی را برای آن در نظر نمی گیردکه به تواند حاصل تغییر به بر نامه اصلی باز گردئد .تغییرات داخل سابروتین نیز روی کپی متغیر انجام می شود.بنابر این هر گاه تغییرات متغییری در داخل سابروتین مورد نظر مانیست آنرا بدون Var  قرار می دهیم.
معرفی قبلی سابروتین ها

 
گاه اتفاق می افتد که یک سابروتین در بر نامه سابروتین دیگری را فرا مکی خواند. از آنجا که قبل از تعریف هیچ عاملی نمی توان از آن استفاده کرد سابروتین فرا خوانده شده باید قبلا معرفی شده باشد حال اگر قرار باشد گاه سابروتین 2 را فرا خواند و گاه سابروتین 1 را ، در اینجا اشکالی بوجود می آید.

به مثال زیر توجه نمائید.

 

Procedure   test1 (some: integer);
Begin
If     some{………..etc.}
Procedure   test2 (another parameter: char);
Begin
test1 (15);
{………..etc.}
End;

این اشکال به این صورت رفع می شود که از کلمه forward استفاده کرده و سابروتین دوم را قبلا معرفی می کنیم. گر چه سابروتین دومی به تفضیل شرح داده شده ولی معرفی آن قبلا از سابروتین 1 مشکل را رفع می کند.